home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 7
/
FM Towns Free Software Collection 7.iso
/
data
/
dora
/
dorarttl.plp
< prev
next >
Wrap
Text File
|
1993-11-30
|
1KB
|
39 lines
%Rttlc{
case(RTTLC={},
{Yes},
{
loop({ SNDMSG({erande_f.snd});
%a @plane(
{c ログカッターRTTLC最新版は、\n}|
{cFBBS(NIFTY)のLIB 5にアップされています。\n}|
{s 既にダウンロードは済んでいますか? /はい /いいえ \n},
);
%ok @head(@getline(a,1,1),{\n});
case (ok,{ 1},
{
footnote({自動実行させる為に「ディレクトリの設定」での登録をお勧めします});
SNDMSG({nyuryo_f.snd});
RTTLdir:=@input({RTTLC.EXEをドライブ名からのフルパスで入力して下さい});
case(@tail(RTTLC,{\})={RTTLC.EXE},
{Yes},{command(RTTL);footnote({RTTLC実行中 })},
{No},{footnote({RTTLC.EXEをドライブ名からのフルパスで入力}|
{して下さい});SNDMSG({okasi_f.snd});wait(3)});
},
{ 2},{display({
\n☆ログカッターRTTLC最新版(’93/05/11現在)のお知らせ☆
\n>LIB 5\n番号 ID 登録日付 バイト 参照 データ名\n222 HCB01371 93/04/21 60149 12 B RTTLC200.LZH RT・TLC Ver2.00 RT用LOGカッター});
footnote({ログカッターRTTLCをFBBS(NIFTY)のLIB 5からダウンロードして下さい。});
wait(5);im({No})},
,{im({No})}
);
});
},
{No},
{
footnote({RTTLC実行中 });
command(RTTLC);
});
im({Yes});
};
Rttlc;